clc;
clear;
A=sym('a%d%d',5);
p=charpoly(A);
E=polyvalmsym(p,A);
simplify(E)
syms v;
P=[1 2 3 4 5 6];
f=poly2sym(P,v),
P1=sym2poly(f)